summaryrefslogtreecommitdiffstats
path: root/SPACE.FOR
blob: d1713c7907cee459f9eaa32193ac170ef2e1407c (plain) (blame)
1
2
3
4
5
6
7
8
	SUBROUTINE SPACE
	write(*,*)'ENTER'
	READ(*,*)
	DO  I=1,27
	  WRITE(*,*)
	ENDDO
	RETURN
	END